(Fsingle_key_description): Accept strings as keys since the buffer menu uses

them.

diff --git a/src/keymap.c b/src/keymap.c
index 44563286e72478a22c9df84a9f13011b7e8f9b1d..55745ffcb39d3badd9ab905362fcff4d04eab578 100644 (file)
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -1438,8 +1438,11 @@ Control characters turn into C-whatever, etc.")
     case Lisp_Symbol:          /* Function key or event-symbol */
       return Fsymbol_name (key);
 
+    case Lisp_String:
+      return key;
+
     default:
-      error ("KEY must be an integer, cons, or symbol.");
+      error ("KEY must be an integer, cons, string, or symbol.");
     }
 }